home *** CD-ROM | disk | FTP | other *** search
/ Apple Reference & Presentation Library 1993 Spring / ARPL-Spring-93-Partner-Edition.iso / Applications / Word Processing / Aldus Personal Press 2.0 / PPPouch / Additions / Measurements / Inches / Inches
Encoding:
Text File  |  1992-05-29  |  327 b   |  21 lines  |  [SGPA/SCPG]
  1. on startup
  2. set measurements to inches
  3. end startup
  4.  
  5. on help
  6.  
  7. put  dialog (preload, 128) into thedialog
  8. put "---a\0" into item2
  9. put "---a\1" into item3
  10. put "---a\2" into item4
  11.  
  12.  
  13. repeat forever
  14. get dialog(display, thedialog)
  15. if (it = 1) then exit repeat
  16. end repeat
  17. get dialog(dispose, thedialog)
  18.  
  19. end help
  20.  
  21.     O<BÏ